home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Original Shareware 1.1
/
The Original Shareware (WeMake CDs)(Volume 1.1)(CDs, Inc)(1993).iso
/
16
/
keditpf.zip
/
PROFILE.KED
Wrap
Text File
|
1986-02-26
|
4KB
|
138 lines
*
* This file incorporates my own preferences for color and set options as well
* as key definitions that map Volkswriter as close as possible. I have created
* a help file which is appended to the end of the key definitions. Put the
* key description in your KEDIT.HLP file and when you press F1 you will have
* a duplicate of the Volkswriter help screen displayed at the top of your
* file.
*
* set colors:
*
* 1.Text: green. 2.Current line: cyan on blue. 3.Block:black on white.
* 4.Cur.line in block: blue on cyan. 5.Cmd line: black on cyan.
* 6.Status line: black on cyan. 7.Msg.line: red. 8.Arrow: black on cyan.
* 9.Line#: green 10 Prefix area with command: green 11. scale line: white.
* 12.TOF/EOF: white. 13.TOF/EOF if current line: white.
* 1 2 3 4 5 6 7 8 9 10 11 12 13
set attr 2 19 112 49 48 48 2 48 2 2 7 7 7
set SCALE ON 3
set REPROFILE ON
*
* Use F1 to call help screen and put it in top half of screen then return to active file:
DEF f1 QCmnd 'kedit kedit.hlp' EXecute QCmnd 'SET SCREEN SIZE 10 *' EXecute QCmnd 'DOWN 5' EXecute QCmnd 'SCALE off' EXecute QCmnd 'nextwindow' EXecute
*
* Use F2 to set up for word processing:
DEF f2 COMMand 'PREServe' EXecute 'SET MARGINS 10 80 15' EXecute 'SET WORDWrap ON' EXecute
*
* Use F3 to move cursor to either end of the cursor line:
DEF f3 IFLEFTEdge ENDChar ELSE FIRSTCH
*
* Use F4 to delete a word:
DEF f4 DELWord
*
* Use f5 to mark the begining of a streaming block:
DEF f5 STREAMMark
*
* Use f6 to mark the end of a streaming block:
DEF f6 STREAMMark
*
* Use f7 to locate text:
DEF f7 COMMand 'LOCATE /'
*
* Use f8 to reformat a paragraph:
DEF f8 FORMatpara
*
* Use f9 to jump between windows:
DEF f9 QCmnd 'nextw' EXecute
*
* Use f10 to unmark blocks:
DEF f10 IFBlock UNMark ENDIF
*
* Use Alt+f1 to print file:
DEF alt-f1 QCmnd 'TOP' EXecute QCmnd 'PRINT * 56' EXecute
*
* Use Alt+f2 to 'read' a file (edit it):
DEF alt-f2 COMMand 'kedit '
*
* Use Alt+f3 to insert a line:
DEF alt-f3 ADDline MARGINL
*
* Use Alt+f4 to delete from the cursor to the end of the line:
DEF alt-f4 DELEnd
*
* Use Alt+f5 to move a block:
DEF alt-f5 MOVEblock
*
* Use Alt+f6 to copy a block:
DEF alt-f6 COPYblock
*
* Use Alt+f7 to change text:
DEF alt-f7 COMMand 'CHANGE /'
*
* Use Alt+f8 to delete a block:
DEF alt-f8 DELBlock
*
* Use Alt+f9 to center text:
DEF alt-f9 CENTer
*
* Use Alt+f10 to quit:
DEF alt-f10 QCmnd 'quit' EXecute QCmnd 'screen 1' EXecute
*
* Ctrl+f1 --> NOT USED
*
* Use Ctrl+f2 to write notes:
DEF ctrl-f2 QCmnd 'kedit notepad' EXecute QCmnd 'screen size 8 *' EXecute
*
* Ctrl+f3 --> NOT USED
*
* Use Ctrl+f4 to delete a line:
DEF ctrl-f4 DELLine
*
* Use Ctrl+f5 to mark the upper left corner of a box:
DEF ctrl-f5 BOXMark
*
* Use Ctrl+f6 to mark the lower right corner of a box:
DEF ctrl-f6 BOXMark
*
* Use Ctrl+f7 to move up:
DEF ctrl-f7 COMMand 'UP '
*
* Use Ctrl+f8 to move down: (This is different from Volkswriter)
DEF ctrl-f8 COMMand 'DOWN '
*
* Ctrl+f9 --> NOT USED
*
* Use Ctrl+f10 to save the file:
DEF ctrl-f10 QCmnd 'save' EXecute
*
* Use Shift-F1 to remove help screen and restore the screen to full size:
DEF shift-f1 QCmnd 'k kedit.hlp' EXecute QCmnd 'quit' EXecute QCmnd 'screen 1' EXecute
*
* Use SHIFT-F2 to restore from word processing:
DEF shift-f2 COMM 'save' EXecute 'RESTore' EXecute
*
*
* Redefine the cursor pad keys:
*
* Use Ctrl+Home to go to the top of the file:
DEF ctrl-home TOPline
*
* Use Ctrl+End to go to the last line of the file:
DEF ctrl-end BOTtomline
*
* Use Ctrl+PgUp to go to the top of the last page:
DEF ctrl-pgup PGUP
*
* Use Ctrl+PgDn to go to the top of the next page:
DEF ctrl-pgdn PGDN
*
* Use the PgUp key to go back half a page:
DEF pgup HALFPGUp
*
* Use the PgDn key to go down half a page:
DEF pgdn HALFPGDn
*
* Use the End key to set the cursor at the bottom of the screen:
DEF end BOTTOMEdge MARGINL
*